home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / Projects / Examples / More Examples / Testing tunings < prev    next >
Encoding:
Text File  |  1998-10-26  |  1.4 KB  |  54 lines  |  [TEXT/ScoM]
  1. ; testing tunings
  2.  
  3. The easiest way to test all the tunings is to place a copy of 
  4. the megatunings file into the SCOM/Extensions folder. When
  5. you next time start up the program all tunings have been
  6. defined and you are ready to use them. Before starting the
  7. testing check out that the steps between semitones figure
  8. (here 4096) matches your synth. When you compile the following
  9. score you should hear a 24 step octave.
  10.  
  11. (def-section a
  12.    default
  13.       zone '(2/1)
  14.       tonality (activate-tonality (equal-tempered 24 'c 4 4096))
  15.       length '(1/8)
  16.       duration '(1/4t)
  17.       velocity '(64)
  18.    piano
  19.       symbol '(a b c d e f g h   i j k l m n o p)
  20. )
  21.  
  22. (midiport :printer)
  23. (def-tempo 120)
  24.  
  25. (play-file-p "tunings"
  26.    piano '(a)
  27. )
  28.  
  29. When testing the tonalities copy the tuning you want to test into the 
  30. activate-tonality as in below. Change the symbols if necessary. Each
  31. instrument must be monophoning, do not use chord symbols. If you do
  32. tuned chords symbol-separate the chord progression into multiple
  33. monophonic instruments. Use def-orchestra to inherit similar
  34. classes to these monophonic instruments.
  35.  
  36. (def-section a
  37.    default
  38.       zone '(2/1)
  39.       tonality (activate-tonality (05-19 c 4 4096))
  40.       length '(1/8)
  41.       duration '(1/4t)
  42.       velocity '(64)
  43.    piano
  44.       symbol '(a b c d e f g h   i j k l m n o p)
  45. )
  46.  
  47. (midiport :printer)
  48. (def-tempo 120)
  49.  
  50. (play-file-p "tunings"
  51.    piano '(a)
  52. )
  53.  
  54.